﻿Imports SuporteModel
Public Class ClienteDao
    Implements ICliente





    Public Function CadastrarCliente(ByVal parCliente As SuporteModel.Cliente) As Boolean Implements ICliente.CadastrarCliente
        Dim fCliente As clsCliente = New clsCliente
        fCliente.Codigo = parCliente.Codigo
        fCliente.Inativo = parCliente.Inativo
        fCliente.Validade = parCliente.Validade
        fCliente.Nome = parCliente.Nome

        Return fCliente.Processar(clsConexao.enuTConexao.Atualizacao)
    End Function

    Public Function ExcluirCliente(ByVal parIdCliente As Integer) As Boolean Implements ICliente.ExcluirCliente

    End Function

    Public Function ListarClientes() As System.Collections.Generic.List(Of SuporteModel.Cliente) Implements ICliente.ListarClientes

    End Function

    Public Function BuscarCliente(parIdCliente As Object) As SuporteModel.Cliente Implements ICliente.BuscarCliente

    End Function
End Class
